home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1994 November: Tool Chest / Dev.CD Nov 94.toast / Sample Code / Snippets / Files / stdFilterHacking / stdFilterHacking.c < prev    next >
Encoding:
C/C++ Source or Header  |  1992-11-12  |  4.2 KB  |  168 lines  |  [TEXT/MPS ]
  1. #include <Dialogs.h>
  2. #include <Controls.h>
  3. #include <QuickDraw.h>
  4. #include <Windows.h>
  5. #include <ToolUtils.h>
  6. #include <OSUtils.h>
  7. #include <Menus.h>
  8. #include <Fonts.h>
  9. #include <resources.h>
  10. #include <Sound.h>
  11. #include <Traps.h>
  12. #include <Gestaltequ.h>
  13. #include <Memory.h>
  14. #include <Scrap.h>
  15. #include <TextEdit.h>
  16.  
  17. /* These are the new Dialog Manager calls described in Tech note #304 */
  18. /* ONLY used if System 7 or later, of course */
  19. pascal OSErr GetStdFilterProc(ModalFilterProcPtr *theProc) = 
  20. {
  21.     0x303C, 0x0203, 0xAA68
  22. };
  23.  
  24.  
  25.  
  26.  
  27. /* Indicates to the dialog manager which item is default.  Will then alias the return key */
  28. /* to this item, and also bold border it for you (yaaaaa!) */
  29. pascal OSErr SetDialogDefaultItem(DialogPtr theDialog, short newItem)
  30. = 
  31. {
  32.     0x303C, 0x0304, 0xAA68
  33. };
  34.  
  35.  
  36.  
  37.  
  38. /* Indicates which item should be aliased to escape or Command - . */
  39. pascal OSErr SetDialogCancelItem(DialogPtr theDialog, short newItem)
  40. = 
  41. {
  42.     0x303C, 0x0305, 0xAA68
  43. };
  44.  
  45.  
  46.  
  47.  
  48. /* Tells the dialog manager that there is an edit line in this dialog, and */
  49. /* it should track and change to an I-Beam cursor when over the edit line */
  50. pascal OSErr SetDialogTracksCursor(DialogPtr theDialog, Boolean tracks) = 
  51. {
  52.     0x303C, 0x0306, 0xAA68
  53. };
  54.  
  55.  
  56.  
  57. ControlHandle SnatchHandle(DialogPtr thebox, short theGetItem);
  58. pascal Boolean filterIt(DialogPtr inputDialog, EventRecord *myDialogEvent, short *theDialogItem);
  59. void ToggleCheckBox(DialogPtr myDialog,short theItem);
  60.  
  61.  
  62.  
  63.  
  64.  
  65.  
  66.  
  67.  
  68.  
  69. enum  {
  70.     /* ok and cancel are already defined in Dialogs.h */
  71.     kMessUpItem = 3,
  72.     kHiliteOK
  73. };
  74. enum  {
  75.  
  76.     kSampleDialog = 128, 
  77.     kMessUpAlert
  78. };
  79.  
  80.  
  81. main()
  82. {
  83.     DialogPtr myDialog = nil;                               /* the dialog wee're using */
  84.     short hitItem = 0;                                      /* hitItem for ModalDialog */
  85.     Rect tempRect;                                          /* these  three are here for all the GetDItem/SetDItem calls*/
  86.     short tempItem;
  87.     Handle tempHandle;
  88.     Boolean tempBool;                                       /* a temporary boolean (now THAT'S a helpful comment */
  89.     /* start up manahers */
  90.     InitGraf((Ptr)&qd.thePort);
  91.     InitFonts();
  92.     InitWindows();
  93.     InitMenus();
  94.     TEInit();
  95.     InitDialogs(nil);
  96.     InitCursor();
  97.     /* get our dialog */
  98.     myDialog = GetNewDialog(kSampleDialog, nil, (WindowPtr)-1);
  99.  
  100.  
  101.  
  102.         SetDialogDefaultItem(myDialog, ok);
  103.         SetDialogCancelItem(myDialog, cancel);
  104.         /* dim the OK button initially */
  105.         HiliteControl(SnatchHandle(myDialog,ok),255);
  106.  
  107.     do {
  108.         ModalDialog((ModalFilterProcPtr)filterIt, &hitItem);
  109.         if(hitItem == kMessUpItem){
  110.         /* bring up an alert to obscure the OK button */
  111.         Alert(kMessUpAlert,nil);
  112.         }
  113.         else{
  114.         if(hitItem == kHiliteOK)
  115.         ToggleCheckBox(myDialog,kHiliteOK);        
  116.         HiliteControl(SnatchHandle(myDialog,ok),GetCtlValue(SnatchHandle(myDialog,hitItem)) ? 0 : 255);
  117.         
  118.         }
  119.     
  120.     }
  121.             while (hitItem != ok && hitItem != cancel);
  122.     DisposDialog(myDialog);
  123.     InitCursor();                                           /* Init to prevent I-beam from hanging around in some circumstances */
  124.  
  125.  
  126.  
  127.  
  128.  
  129.  
  130. }
  131.  
  132.  
  133. pascal Boolean filterIt(DialogPtr inputDialog, EventRecord *myDialogEvent, short *theDialogItem)
  134. {
  135.    ModalFilterProcPtr  theModalProc;  /* address of standard filter */
  136.  
  137.  
  138.    if (/* myDialogEvent->what == activateEvt || */myDialogEvent->what == updateEvt) {
  139.    /* reset the state of the button based on my */
  140.    /* check box.  Use whatever conditions you need to determine the  */
  141.    /* correct highlighting */
  142.     HiliteControl(SnatchHandle(inputDialog,ok),GetCtlValue(SnatchHandle(inputDialog,kHiliteOK)) ? 0 : 255);
  143.  
  144.     } 
  145. /* You must still call through the standard filter for things to work, of course */
  146.    GetStdFilterProc( &theModalProc ) ;
  147.    return ( theModalProc( inputDialog, myDialogEvent, theDialogItem ) );
  148.  
  149. }
  150.  
  151. ControlHandle SnatchHandle(DialogPtr thebox, short theGetItem)
  152. {
  153.     short itemtype;
  154.     Rect itemrect;
  155.     Handle thandle;
  156.     
  157.     GetDItem(thebox, theGetItem, &itemtype, &thandle, &itemrect);
  158.     return((ControlHandle)thandle);
  159. } /* end SnatchHandle */
  160.  
  161.  
  162. void ToggleCheckBox(DialogPtr myDialog,short theItem)
  163. {
  164.  
  165. SetCtlValue(SnatchHandle(myDialog,theItem),GetCtlValue(SnatchHandle(myDialog,theItem)) ? false:true);
  166. }
  167.  
  168.